home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The CICA Windows Explosion!
/
The CICA Windows Explosion! - Disc 2.iso
/
misc
/
allma.zip
/
WHT-JUST.SMM
< prev
next >
Wrap
INI File
|
1994-12-01
|
11KB
|
877 lines
[ver]
4
[sty]
[files]
[charset]
82
ANSI (Windows, IBM CP 1252)
[revisions]
0
[prn]
HP LaserJet IIISi PostScript
[port]
LPT1:
[lang]
1
[fldnames]
Field1
Field2
Field3
Field4
Field5
Field6
Field7
Field8
[desc]
Calls up Justification icons
786354775
31
757997507
151
3
0
0
0
0
1
[fopts]
0
1
0
0
[lnopts]
2
Body Text
1
[docopts]
5
2
[GramStyle]
[tag]
Defines
2
[fnt]
Times New Roman
200
0
49152
[algn]
1
1
0
0
0
[spc]
33
273
1
0
0
1
100
[brk]
4
[line]
8
0
1
0
1
1
1
10
10
1
[spec]
0
0
0
1
1
0
0
0
0
[nfmt]
280
1
2
.
,
$
Body Text
0
0
[tag]
Function
3
[fnt]
Times New Roman
240
0
49153
[algn]
1
1
0
0
0
[spc]
33
273
1
0
0
1
100
[brk]
68
[line]
8
0
1
0
1
1
1
10
10
1
[spec]
0
0
0
1
1
0
0
0
0
[nfmt]
280
1
2
.
,
$
Body Text
0
0
[tag]
If Endif
4
[fnt]
Times New Roman
240
16711680
49153
[algn]
1
1
0
0
0
[spc]
33
273
1
0
0
1
100
[brk]
68
[line]
8
0
1
0
1
1
1
10
10
1
[spec]
0
0
0
1
1
0
0
0
0
[nfmt]
280
1
2
.
,
$
Body Text
0
0
[tag]
For Next
5
[fnt]
Times New Roman
240
33024
49153
[algn]
1
1
0
0
0
[spc]
33
273
1
0
0
1
100
[brk]
68
[line]
8
0
1
0
1
1
1
10
10
1
[spec]
0
0
0
1
1
0
0
0
0
[nfmt]
280
1
2
.
,
$
Body Text
0
0
[tag]
While Wend
6
[fnt]
Times New Roman
240
16711809
49153
[algn]
1
1
0
0
0
[spc]
33
273
1
0
0
1
100
[brk]
68
[line]
8
0
1
0
1
1
1
10
10
1
[spec]
0
0
0
1
1
0
0
0
0
[nfmt]
280
1
2
.
,
$
Body Text
0
0
[tag]
Label
7
[fnt]
Times New Roman
240
255
49153
[algn]
1
1
0
0
0
[spc]
33
273
1
0
0
1
100
[brk]
4
[line]
8
0
1
0
1
1
1
10
10
1
[spec]
0
0
0
1
1
0
0
0
0
[nfmt]
280
1
2
.
,
$
Body Text
0
0
[tag]
Body Text
8
[fnt]
Times New Roman
240
0
49152
[algn]
1
1
0
0
0
[spc]
33
273
1
0
0
1
100
[brk]
4
[line]
8
0
1
0
1
1
1
10
10
1
[spec]
0
0
0
1
1
0
0
0
0
[nfmt]
280
1
2
.
,
$
Body Text
0
0
[lay]
Standard
513
[rght]
15840
12240
1
1440
1440
1
1440
1440
0
1
0
1
0
2
1
1440
10800
12
1
720
1
1440
1
2160
1
2880
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
[hrght]
[lyfrm]
1
11200
0
0
12240
1440
0
1
3
1 0 0 0 0 0 0
0
0
1
[frmlay]
1440
12240
1
1440
72
1
792
1440
0
1
0
1
1
0
1
1440
10800
2
2
4680
3
9360
[txt]
ashley bass
>
[frght]
[lyfrm]
1
13248
0
14400
12240
15840
0
1
3
1 0 0 0 0 0 0
0
0
2
[frmlay]
15840
12240
1
1440
792
1
14472
1440
0
1
0
1
1
0
1
1440
10800
2
2
4680
3
9360
[txt]
>
[elay]
[l1]
0
[pg]
3
45 0 39 0 0 0 0 65535 2 Standard 65535 0 0 0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
66 84 2 288 0 0 0 65535 2 Standard 65535 0 0 0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
68 0 42 1281 0 0 0 65535 65535 Standard 65535 0 0 0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
[edoc]
@Defines@<+@><:#284,9360><:f240,,><+,>Define MoveWindow() DllCall("User,MoveWindow,HHHHHHA",%1,%2,%3,%4,%5,%6)<-,>
@Defines@<:#284,9360><+,><:f240,,>Define Get<-,><+,>Size() DllCall("user,GetWindowRect,HHN",%1,%2)<-,>
@Function@<:#284,9360><-!><:f240,2Times New Roman,0,0,0>function begin(hdlg)
<:#284,9360><:f240,2Times New Roman,0,0,0>thisfile = getrunningmacrofile$()
<:#284,9360><:f240,2Times New Roman,0,0,0>metrics = getprofilestring$("wht-just", "Metrics", "{windir}amipro2.ini")
@If Endif@<:#284,9360><:f240,2Times New Roman,0,0,0> if metrics != ""
<:#284,9360><:f240,2Times New Roman,0,0,0> setdlgcallback(0, "{thisfile}!init")
@If Endif@<:#284,9360><:f240,2Times New Roman,0,0,0> endif
<:#284,9360><:f240,2Times New Roman,0,0,0>setdlgcallback(20, "{thisfile}!curloc")
@If Endif@<+C><:#284,9360><:f240,2Times New Roman,0,0,0>DlgKeyInterrupt(<[>F1], "HelpFun") ' This if F1
<+C><:#284,9360><:f240,2Times New Roman,0,0,0>Box = DialogBox(".", "main")
<:#284,9360><:f240,2Times New Roman,0,0,0>IF Box = -1
<:#284,9360><:f240,2Times New Roman,0,0,0>Message("Could not open dialog box; Exiting macro.")
<:#284,9360><:f240,2Times New Roman,0,0,0>EXIT FUNCTION
<:#284,9360><:f240,2Times New Roman,0,0,0>ELSEIF Box = 2<:f>
<+C><:#284,9360><:f240,2Times New Roman,0,0,0>exit function
<:#284,9360><:f240,2Times New Roman,0,0,0>ELSEIF Box = 3
<:#284,9360><:f240,2Times New Roman,0,0,0>LeftAlign()
<:#284,9360><:f240,2Times New Roman,0,0,0>ELSEIF Box = 4
<:#284,9360><:f240,2Times New Roman,0,0,0>Center()
<:#284,9360><:f240,2Times New Roman,0,0,0>ELSEIF Box = 5
<:#284,9360><:f240,2Times New Roman,0,0,0>RightAlign()
<:#284,9360><:f240,2Times New Roman,0,0,0>ELSEIF Box = 6
<:#284,9360><:f240,2Times New Roman,0,0,0>Justify()
<:#284,9360><:f240,2Times New Roman,0,0,0>ENDIF
<:#284,9360><:f240,2Times New Roman,0,0,0>END FUNCTION
<:#284,9360><-!><:f240,2Times New Roman,0,0,0>FUNCTION HelpFun(hdlg, key)
<:#284,9360><:f240,2Times New Roman,0,0,0>DialogBox(".","Helper")
@Function@<:#284,9360><:f240,2Times New Roman,0,0,0>end function
@Function@<:#284,9360><:f240,2Times New Roman,0,0,0>function init(hdlg)
<:#284,9360><:f240,2Times New Roman,0,0,0>metrics = getprofilestring$("wht-just", "Metrics", "{windir}amipro2.ini")
<:#284,9360><:f240,2Times New Roman,0,0,0>x = strfield$(metrics, 1, ",")
<:#284,9360><:f240,2Times New Roman,0,0,0>y = strfield$(metrics, 2, ",")
<:#284,9360><:f240,2Times New Roman,0,0,0>w = strfield$(metrics, 3, ",")
<:#284,9360><:f240,2Times New Roman,0,0,0>h = strfield$(metrics, 4, ",")
<:#284,9360><:f240,2Times New Roman,0,0,0>movewindow(hdlg, x, y, w, h, 1)
@Function@<:#284,9360><:f240,2Times New Roman,0,0,0>end function
@Function@<:#284,9360><:f240,2Times New Roman,0,0,0>function curloc(hdlg)
<:#284,9360><:f240,2Times New Roman,0,0,0>dim coord(4)
<:#284,9360><:f240,2Times New Roman,0,0,0>getsize(hdlg, &coord)
<:#284,9360><:f240,2Times New Roman,0,0,0>x = coord(1)
<:#284,9360><:f240,2Times New Roman,0,0,0>y = coord(2)
<:#284,9360><:f240,2Times New Roman,0,0,0>cx = coord(3)
<:#284,9360><:f240,2Times New Roman,0,0,0>cy = coord(4)
<:#284,9360><:f240,2Times New Roman,0,0,0>w = cx - x
<:f240,2Times New Roman,0,0,0>h = cy - y
<:f240,2Times New Roman,0,0,0>writeprofilestring("wht-just", "Metrics", strcat$(x, ",", y, ",", w, ",", h), "{windir}amipro2.ini")
<+@><:f240,2Times New Roman,0,0,0>end function
DIALOG main
<:R1,20,1,720,1,1440,1,2160,1,2880,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,3600,1,4320,1,5071,1,5775,1,6495,1,7200,1,7935,1,8579,>-2134900736 7 0 23 65 17 "" "AmiDialog" "Justification"
<:R>2 3 12 12 3 1342373896 "button" "c:\amipro\icons\dlgicos\j_left.bmp" 0
15 3 12 12 4 1342373896 "button" "c:\amipro\icons\dlgicos\j_center.bmp" 0
28 3 12 12 5 1342373896 "button" "c:\amipro\icons\dlgicos\j_right.bmp" 0
41 3 12 12 6 1342373896 "button" "c:\amipro\icons\dlgicos\j_justfy.bmp" 0
55 7 8 8 2 1342373896 "button" "c:\amipro\icons\dlgicos\escape.bmp" 0
56 3 6 3 20 1342373888 "button" "" 0
0 1 65 16 1002 1342177287 "static" "" 0
END DIALOG
<:f240,2Times New Roman,0,0,0>DIALOG Helper
<:f240,2Times New Roman,0,0,0>-2143289344 7 118 50 130 63 "" "" ""
<:f240,2Times New Roman,0,0,0>46 46 40 14 2 1342373888 "button" "&Close" 0
<:f240,2Times New Roman,0,0,0>4 14 27 20 1001 1342177281 "static" "Left Justified" 0
<:f240,2Times New Roman,0,0,0>36 14 27 20 1003 1342177281 "static" " Center Justified" 0
<:f240,2Times New Roman,0,0,0>66 14 31 20 1004 1342177281 "static" "Right Justified" 0
<:f240,2Times New Roman,0,0,0>99 14 28 23 1005 1342177281 "static" "Fully Justified" 0
<:#852,9360><:f240,2Times New Roman,0,0,0>2 1 126 37 20 1342308359 "button" "JUSTIFICATION help" 0
<:#560,9360><:f240,2Times New Roman,0,0,0>117 55 12 7 1000 1342177280 "static" <:f240,2Times New Roman,255,255,255>"abb" <:f240,2Times New Roman,0,0,0>0
<:#280,9360><:f240,2Times New Roman,0,0,0>END DIALOG<:f>
>
[Embedded]
00009104
>
[macsum] 6
begin 0 1 5 2
HelpFun 558 2 1 26
init 601 1 7 29
curloc 849 1 9 37
main 1127 0 -1 48
Helper 1651 0 -1 58
[macse]
14 begin
0 802
13
8 2
0 286 "wht-just" "Metrics" "{4}amipro2.ini"
13
8 3
6 3
7 ""
18 1
11 00000129
0 41 0 "{2}!init"
0 41 20 "{2}!curloc"
0 47 112 "HelpFun"
0 26 "." "main"
13
8 5
6 5
5 -1
18 0
11 00000301
0 3 "Could not open dialog box; Exiting macro."
6 1
15
9
10 00000546
6 5
5 2
18 0
11 00000355
6 1
15
9
10 00000546
6 5
5 3
18 0
11 00000406
2 259 1
10 00000546
6 5
5 4
18 0
11 00000457
2 260 1
10 00000546
6 5
5 5
18 0
11 00000508
2 261 1
10 00000546
6 5
5 6
18 0
11 00000546
2 262 1
6 1
15
9
14 HelpFun
0 26 "." "Helper"
6 2
15
9
14 init
0 286 "wht-just" "Metrics" "{3}amipro2.ini"
13
8 2
0 20 "{2}" 1 ","
13
8 4
0 20 "{2}" 2 ","
13
8 5
0 20 "{2}" 3 ","
13
8 6
0 20 "{2}" 4 ","
13
8 7
0 284 "User,MoveWindow,HHHHHHA" "{0}" "{4}" "{5}" "{6}" "{7}" 1
6 1
15
9
14 curloc
5 4
21 2 [X]
0 284 "user,GetWindowRect,HHN" "{0}" &2
5 1
22 2
8 3
5 2
22 2
8 4
5 3
22 2
8 5
5 4
22 2
8 6
6 5
6 3
3 1
8 7
6 6
6 4
3 1
8 8
0 16 "{3}" "," "{4}" "," "{7}" "," "{8}"
13
0 287 "wht-just" "Metrics" [X] "{9}amipro2.ini"
6 1
15
9
DIALOG main
-2134900736 7 0 23 65 17 "" "AmiDialog" "Justification"
2 3 12 12 3 1342373896 "button" "c:\amipro\icons\dlgicos\j_left.bmp" 0
15 3 12 12 4 1342373896 "button" "c:\amipro\icons\dlgicos\j_center.bmp" 0
28 3 12 12 5 1342373896 "button" "c:\amipro\icons\dlgicos\j_right.bmp" 0
41 3 12 12 6 1342373896 "button" "c:\amipro\icons\dlgicos\j_justfy.bmp" 0
55 7 8 8 2 1342373896 "button" "c:\amipro\icons\dlgicos\escape.bmp" 0
56 3 6 3 20 1342373888 "button" "" 0
0 1 65 16 1002 1342177287 "static" "" 0
DIALOG Helper
-2143289344 7 118 50 130 63 "" "" ""
46 46 40 14 2 1342373888 "button" "&Close" 0
4 14 27 20 1001 1342177281 "static" "Left Justified" 0
36 14 27 20 1003 1342177281 "static" " Center Justified" 0
66 14 31 20 1004 1342177281 "static" "Right Justified" 0
99 14 28 23 1005 1342177281 "static" "Fully Justified" 0
2 1 126 37 20 1342308359 "button" "JUSTIFICATION help" 0
117 55 12 7 1000 1342177280 "static" "abb" 0
00009129
